﻿Public Class Test2
    Private privatefield1 As String
    Public Property field1() As String
        Get
            Return privatefield1
        End Get
        Set(ByVal value As String)
            privatefield1 = value
        End Set
    End Property
    Private privatefield2 As String
    Public Property field2() As String
        Get
            Return privatefield2
        End Get
        Set(ByVal value As String)
            privatefield2 = value
        End Set
    End Property
End Class